home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2005 June
/
ccd0605.iso
/
Software
/
Shareware
/
Comunicatii
/
bandman
/
bwmsetup.exe
/
{app}
/
bwm.exe
/
0
/
RCDATA
/
TEDITRULEFORM
/
TEDITRULEFORM.txt
< prev
Wrap
Text File
|
2005-05-01
|
14KB
|
589 lines
object EditRuleForm: TEditRuleForm
Left = 313
Top = 265
BorderStyle = bsDialog
BorderWidth = 5
Caption = 'EditRuleForm'
ClientHeight = 383
ClientWidth = 352
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Shell Dlg'
Font.Style = []
OldCreateOrder = False
Position = poOwnerFormCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Pages: TPageControl
Left = 0
Top = 0
Width = 352
Height = 344
ActivePage = tsGeneral
Align = alTop
TabOrder = 0
object tsGeneral: TTabSheet
Caption = 'General'
object ImageGenIcon: TImage
Left = 13
Top = 18
Width = 32
Height = 32
AutoSize = True
Picture.Data = {<image000.ico>}
end
object leRuleName: TLabeledEdit
Left = 59
Top = 30
Width = 272
Height = 21
EditLabel.Width = 53
EditLabel.Height = 13
EditLabel.Caption = 'Rule Name'
TabOrder = 0
end
object rgFilterDirection: TRadioGroup
Left = 8
Top = 59
Width = 325
Height = 48
Caption = 'Direction'
Columns = 3
ItemIndex = 2
Items.Strings = (
'Incoming'
'Outgoing'
'Either')
TabOrder = 1
end
object gbInterface: TGroupBox
Left = 8
Top = 251
Width = 326
Height = 57
Caption = 'Apply Rule on Interface'
TabOrder = 3
object cmbApplyOn: TComboBox
Left = 16
Top = 24
Width = 293
Height = 22
Style = csOwnerDrawFixed
ItemHeight = 16
ItemIndex = 0
TabOrder = 0
Text = 'Any'
OnDrawItem = cmbApplyOnDrawItem
Items.Strings = (
'Any')
end
end
object gbProtocol: TGroupBox
Left = 8
Top = 192
Width = 325
Height = 54
Caption = 'Protocol'
TabOrder = 2
object cmbProtocols: TComboBox
Left = 16
Top = 20
Width = 293
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
OnChange = cmbProtocolsChange
Items.Strings = (
'Any protocol'
'TCP'
'UDP'
'TCP or UDP')
end
end
object rgTransferRate: TGroupBox
Left = 8
Top = 113
Width = 325
Height = 75
Caption = 'Transfer Rate Limit'
TabOrder = 4
object cmbRate: TComboBox
Left = 16
Top = 44
Width = 293
Height = 21
DropDownCount = 12
ItemHeight = 13
TabOrder = 0
end
object rbBytes: TRadioButton
Left = 105
Top = 18
Width = 66
Height = 17
Caption = 'Bytes/sec'
Checked = True
TabOrder = 1
TabStop = True
OnClick = rbBytesClick
end
object rbBits: TRadioButton
Left = 187
Top = 18
Width = 57
Height = 17
Caption = 'Bit/sec'
TabOrder = 2
OnClick = rbBitsClick
end
object rbQuota: TRadioButton
Left = 251
Top = 18
Width = 57
Height = 17
Caption = 'Quota'
TabOrder = 3
OnClick = rbQuotaClick
end
end
end
object tsSource: TTabSheet
Caption = 'Source'
ImageIndex = 1
object gbSourceIpAddr: TGroupBox
Left = 8
Top = 16
Width = 329
Height = 153
Caption = 'Source Address'
TabOrder = 0
object rbSrcMyComputer: TRadioButton
Left = 11
Top = 24
Width = 113
Height = 17
Caption = 'Local host'
Checked = True
TabOrder = 0
TabStop = True
OnClick = SourceIpChanged
end
object rbSrcMacAddress: TRadioButton
Left = 11
Top = 48
Width = 113
Height = 17
Caption = 'MAC Address'
TabOrder = 1
OnClick = SourceIpChanged
end
object rbSrcIpAddr: TRadioButton
Left = 11
Top = 72
Width = 113
Height = 17
Caption = 'Single IP Address'
TabOrder = 2
OnClick = SourceIpChanged
end
object rbSrcIpRange: TRadioButton
Left = 11
Top = 96
Width = 113
Height = 17
Caption = 'Whole IP Range'
TabOrder = 3
OnClick = SourceIpChanged
end
object rbSrcIpAny: TRadioButton
Left = 11
Top = 120
Width = 113
Height = 17
Caption = 'Any IP Address'
TabOrder = 4
OnClick = SourceIpChanged
end
end
object gbSourceIpPort: TGroupBox
Left = 8
Top = 176
Width = 329
Height = 129
Caption = 'Source Port'
TabOrder = 1
object rbSrcPortAny: TRadioButton
Left = 11
Top = 25
Width = 49
Height = 17
Caption = 'Any'
Checked = True
TabOrder = 0
TabStop = True
OnClick = SourcePortChanged
end
object rbSrcPortSinglePort: TRadioButton
Left = 11
Top = 50
Width = 73
Height = 17
Caption = 'Single port'
TabOrder = 1
OnClick = SourcePortChanged
end
object rbSrcPortRange: TRadioButton
Left = 11
Top = 75
Width = 73
Height = 17
Caption = 'Port Range'
TabOrder = 2
OnClick = SourcePortChanged
end
object rbSrcPortList: TRadioButton
Left = 11
Top = 100
Width = 73
Height = 17
Caption = 'Port List'
TabOrder = 3
OnClick = SourcePortChanged
end
object SrcIpPortNotebook: TNotebook
Left = 185
Top = 19
Width = 129
Height = 99
PageIndex = 3
TabOrder = 4
object TPage
Left = 0
Top = 0
Caption = 'SINGLE'
object edSrcIpSinglePort: TEdit
Left = 4
Top = 29
Width = 43
Height = 21
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'RANGE'
object leSrcPortFrom: TLabeledEdit
Left = 6
Top = 54
Width = 43
Height = 21
EditLabel.Width = 23
EditLabel.Height = 13
EditLabel.Caption = 'From'
TabOrder = 0
end
object leSrcPortTo: TLabeledEdit
Left = 61
Top = 54
Width = 44
Height = 21
EditLabel.Width = 13
EditLabel.Height = 13
EditLabel.Caption = 'To'
TabOrder = 1
end
end
object TPage
Left = 0
Top = 0
Caption = 'LIST'
object lbSrcPortList: TListBox
Left = 2
Top = 1
Width = 123
Height = 67
ItemHeight = 13
MultiSelect = True
TabOrder = 0
end
object btnSrcIpAddPort: TButton
Left = 4
Top = 73
Width = 54
Height = 23
Caption = 'Add'
TabOrder = 1
OnClick = btnSrcIpAddPortClick
end
object btnSrcIpDelPort: TButton
Left = 67
Top = 73
Width = 56
Height = 23
Caption = 'Remove'
TabOrder = 2
OnClick = btnSrcIpDelPortClick
end
end
object TPage
Left = 0
Top = 0
Caption = 'EMPTY'
end
end
end
end
object tsDestination: TTabSheet
Caption = 'Destination'
ImageIndex = 2
object gbDestinationIpAddr: TGroupBox
Left = 8
Top = 16
Width = 329
Height = 153
Caption = 'Destination Address'
TabOrder = 0
object rbDstMyComputer: TRadioButton
Left = 11
Top = 24
Width = 113
Height = 17
Caption = 'Local host'
Checked = True
TabOrder = 0
TabStop = True
OnClick = DestinationIpChanged
end
object rbDstMacAddress: TRadioButton
Left = 11
Top = 48
Width = 113
Height = 17
Caption = 'MAC Address'
TabOrder = 1
OnClick = DestinationIpChanged
end
object rbDstIpAddr: TRadioButton
Left = 11
Top = 72
Width = 113
Height = 17
Caption = 'Single IP Address'
TabOrder = 2
OnClick = DestinationIpChanged
end
object rbDstIpRange: TRadioButton
Left = 11
Top = 96
Width = 113
Height = 17
Caption = 'Whole IP Range'
TabOrder = 3
OnClick = DestinationIpChanged
end
object rbDstIpAny: TRadioButton
Left = 11
Top = 120
Width = 113
Height = 17
Caption = 'Any IP Address'
TabOrder = 4
OnClick = DestinationIpChanged
end
end
object gbDestinationIpPort: TGroupBox
Left = 8
Top = 176
Width = 329
Height = 129
Caption = 'Destination Port'
TabOrder = 1
object rbDstPortAny: TRadioButton
Left = 11
Top = 25
Width = 49
Height = 17
Caption = 'Any'
Checked = True
TabOrder = 0
TabStop = True
OnClick = DestinationPortChanged
end
object rbDstPortSinglePort: TRadioButton
Left = 11
Top = 50
Width = 73
Height = 17
Caption = 'Single port'
TabOrder = 1
OnClick = DestinationPortChanged
end
object rbDstPortRange: TRadioButton
Left = 11
Top = 75
Width = 73
Height = 17
Caption = 'Port Range'
TabOrder = 2
OnClick = DestinationPortChanged
end
object rbDstPortList: TRadioButton
Left = 11
Top = 100
Width = 73
Height = 17
Caption = 'Port List'
TabOrder = 3
OnClick = DestinationPortChanged
end
object DstIpPortNotebook: TNotebook
Left = 185
Top = 19
Width = 129
Height = 99
PageIndex = 3
TabOrder = 4
object TPage
Left = 0
Top = 0
Caption = 'SINGLE'
object edDstIpSinglePort: TEdit
Left = 4
Top = 29
Width = 43
Height = 21
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'RANGE'
object leDstPortFrom: TLabeledEdit
Left = 6
Top = 54
Width = 43
Height = 21
EditLabel.Width = 23
EditLabel.Height = 13
EditLabel.Caption = 'From'
TabOrder = 0
end
object leDstPortTo: TLabeledEdit
Left = 61
Top = 54
Width = 44
Height = 21
EditLabel.Width = 13
EditLabel.Height = 13
EditLabel.Caption = 'To'
TabOrder = 1
end
end
object TPage
Left = 0
Top = 0
Caption = 'LIST'
object lbDstPortList: TListBox
Left = 2
Top = 1
Width = 123
Height = 67
ItemHeight = 13
MultiSelect = True
TabOrder = 2
end
object btnDstIpAddPort: TButton
Left = 4
Top = 73
Width = 54
Height = 23
Caption = 'Add'
TabOrder = 0
OnClick = btnDstIpAddPortClick
end
object btnDstIpDelPort: TButton
Left = 67
Top = 73
Width = 56
Height = 23
Caption = 'Remove'
TabOrder = 1
OnClick = btnDstIpDelPortClick
end
end
object TPage
Left = 0
Top = 0
Caption = 'EMPTY'
end
end
end
end
object tsAdvanced: TTabSheet
Caption = 'Advanced'
ImageIndex = 3
object gbTimeTable: TGroupBox
Left = 8
Top = 13
Width = 325
Height = 89
Caption = 'Timetable'
TabOrder = 0
object cbUseTimeTable: TCheckBox
Left = 18
Top = 24
Width = 209
Height = 17
Caption = 'Use the following schedule'
TabOrder = 0
end
object cmbTimeTables: TComboBox
Left = 16
Top = 53
Width = 293
Height = 21
Style = csDropDownList
ItemHeight = 0
TabOrder = 1
end
end
end
end
object btnOk: TButton
Left = 178
Top = 355
Width = 75
Height = 25
Caption = '&OK'
ModalResult = 1
TabOrder = 1
OnClick = btnOkClick
end
object btnCancel: TButton
Left = 264
Top = 355
Width = 75
Height = 25
Cancel = True
Caption = '&Cancel'
ModalResult = 2
TabOrder = 2
end
object cbRuleActive: TCheckBox
Left = 17
Top = 356
Width = 83
Height = 17
Caption = 'Rule Active'
TabOrder = 3
end
end